home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 15
/
Aminet 15 - Nov 1996.iso
/
Aminet
/
gfx
/
conv
/
metaview.lha
/
MetaView
/
MetaView.install
< prev
next >
Wrap
Text File
|
1996-09-26
|
5KB
|
168 lines
;$VER: MetaView Install 1.3 (26.09.1996)
;Copyright ©1996 Henk Jonas
(set @app-name "MetaView V1.3")
(set @sourcedir (pathonly @icon))
(set #wbversion (getversion "libs:version.library"))
(set #wbversion (/ #wbversion 65536))
(if (< #wbversion 37)
(abort "\n\nAmigaDOS 2.0 or better is needed this software.")
)
(message "Henk Jonas\npresent:\n\nMetaView\n\nThis programm show and convert gfx-metafiles,\nuse the amigametaformat.library\nand is Public Domain.")
(set user-level @user-level)
(user 2)
(set @parentdir
(askdir
(prompt "Please choice the destination for MetaView.\nI will create a drawer with name MetaView there.")
(help @askdir-help)
(default "RAM:")
(disk)
)
)
(user user-level)
(set @default-dest (tackon @parentdir "Messlabor"))
(makedir @default-dest
(prompt "Die Schublade 'Messlabor' wird erzeugt.")
(help @makedir-help)
(infos)
)
(complete 5)
(copylib
(prompt "Now i install the 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/amigametaformat.library"))
(dest "libs:")
(optional "nofail" "force" "askuser")
(help "This library are needed for this programm.\nIt is very importent to install this!")
)
(complete 15)
(set driver
(askoptions
(prompt "Now i install the different Outputdrivers for the 'amigametaformat.library'.")
(choices "Window" "Region" "AMF" "CGM" "EPS" "GEM" "WordWorth")
(help "the options:\n"
"* Window : are for output in windows, it`s very importent.\n"
"* Region : are for all other drawingoutput like printer or IFF-ILBM files,it`s also very importent.\n"
"* AMF : are for output as Amiga Metafile Format.\n"
"* CGM : are for output as Computer Graphics Metafile.\n"
"* EPS : are for output as Encapsulated PostScript.\n"
"* GEM : are for output as GEM Metafile.\n"
"* WordWorth : create ARexx scripts, for use in WordWorth.\n")
)
)
(complete 20)
(if (IN driver 0)
(copylib
(prompt "Now i install the windowdriver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-window.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "windowdriver for drawing in windows\n")
)
)
(complete 25)
(if (IN driver 1)
(copylib
(prompt "Now i install the regiondriver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-region.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "regiondriver for printing and saving as ILBM files\n")
)
)
(complete 30)
(if (IN driver 2)
(copylib
(prompt "Now i install the filedriver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-file.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "file for saving as Amiga Meta Format Metafile\n")
)
)
(complete 35)
(if (IN driver 3)
(copylib
(prompt "Now i install the CGMdriver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-cgm.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "CGM for saving as Computer Graphics Metafile\n")
)
)
(complete 40)
(if (IN driver 4)
(copylib
(prompt "Now i install the EPSdriver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-eps.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "EPS for saving as Encapsulated PostScript\n")
)
)
(complete 45)
(if (IN driver 5)
(copylib
(prompt "Now i install the GEMdriver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-gem.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "GEM for saving as GEM Metafile\n")
)
)
(complete 50)
(if (IN driver 6)
(copylib
(prompt "Now i install the WordWorth-ARexx-driver for 'amigametaformat.library'.")
(source (tackon @sourcedir "libs/AMF/amigametaformat-ww.driver"))
(dest "libs:AMF/")
(optional "nofail" "force" "askuser")
(help "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n")
)
)
(complete 55)
(copyfiles
(prompt "copy programm")
(source (tackon @sourcedir "MetaView"))
(dest @default-dest)
(infos)
(help "Now i copy the programm.")
)
(complete 70)
(copyfiles
(prompt "copy examples")
(source (tackon @sourcedir "examples/"))
(dest (tackon @default-dest "examples/"))
(files)
(all)
(infos)
(help "Now i copy some examples.")
)
(complete 100)